/** 
* Copyright 2011 Juergen Lipp
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
* 
*     http://www.apache.org/licenses/LICENSE-2.0
* 
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/

create or replace 
type body ConsoleAppender as

	constructor function ConsoleAppender(name varchar2) return self as result as
	begin
		self.Name := name;
		self.Treshold := LogLevel.Debug;
		return;
	end;
	
	overriding member procedure Append(loggingEvent LoggingEvent) as
	begin
		dbms_output.put_line(self.RenderLoggingEvent(loggingEvent));
	end;
	
	overriding member function GetUnitName return varchar2 as
	begin
		return $$PLSQL_UNIT;
	end;
	
end;
/
